home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 35
/
035.d81
/
reaper boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
695b
|
19 lines
0 rem reaper boot
3 ifx=0thenpoke53281,1:poke53280,6
4 ifx=0thenprint"[147][144] [206]ow entering the [210]eaper's [195]ave..."
5 ifx=0thenx=1:load"unpacker",8,1
6 ifx=1thenx=2:load"reaper.title.shp",8,1
7 ifx=2thenx=3:load"hi-res text.o",8,1
10 poke249,224:poke250,204: rem screen/color
20 poke251,0:poke252,64: rem shp buffer
30 poke253,0:poke254,0: rem x-pos,y-pos
35 poke53281,1: rem border to white
50 sys51456: rem unpack normal shp
60 sys51459: rem show screen
70 f$="cave of reaper":rem file to load & run
75 p$=chr$(34)+"press any key"+chr$(34): t$="sys50759,"+p$+",14*8,24*8"
80 print"[147]loadf$,8"
81 print""t$;
82 print":poke198,0:wait198,1:sys51459:run"
83 poke631,13:poke632,13:poke198,2:end